home *** CD-ROM | disk | FTP | other *** search
/ FishMarket 1.0 / FishMarket v1.0.iso / fishies / 426-450 / disk_430 / smartfields / functions / field_paste.c < prev    next >
C/C++ Source or Header  |  1992-05-06  |  921b  |  35 lines
  1. /***************************************
  2. *  FIELD PASTE v1.02
  3. *  © Copyright 1988 Timm Martin
  4. *  All Rights Reserved
  5. ****************************************/
  6.  
  7. #include <exec/io.h>
  8. #include <exec/types.h>
  9. #include <console/console.h>
  10. #include <console/fields.h>
  11. #include <console/functions.h>
  12. #include <toolkit/toolkit.h>
  13.  
  14. void field_paste( field, wreq )
  15.   struct Field *field;
  16.   struct IOStdReq *wreq;
  17. {
  18.   extern UBYTE field__clip[];  /* defined in field_input() */
  19.   REG    int i;
  20.  
  21.   if (field__clip[0]) {
  22.     cursor_jump_left( wreq, field->BufferPos );
  23.     con_char_mult_delete( wreq, field->NumChars );
  24.     for (i = 0; i < field->MaxChars - 1 && field__clip[i]; i++)
  25.       *(field->Buffer + i) = field__clip[i];
  26.     *(field->Buffer + i) = '\0';
  27.     field->NumChars = i;
  28.     con_put_string( wreq, field->Buffer );
  29.     cursor_jump_left( wreq, field->NumChars );
  30.     field->BufferPos = 0;
  31.   }
  32.   else
  33.     FLASH_SCREEN;
  34. }
  35.